home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_1 / issue_08 / fitton / sourcecode / header02 < prev    next >
Unknown  |  1988-04-02  |  2.0 KB
open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text


This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 75 30 1d f4 20 3e 20 | 26 2e 53 6f 75 72 63 65 |.u0.. > |&.Source|
|00000010| 43 6f 64 65 2e 48 65 61 | 64 65 72 30 32 0d 75 3a |Code.Hea|der02.u:|
|00000020| 27 f4 20 41 75 74 68 6f | 72 20 20 20 20 20 20 20 |'. Autho|r       |
|00000030| 20 20 20 20 20 20 20 20 | 3a 20 47 20 4c 20 46 69 |        |: G L Fi|
|00000040| 74 74 6f 6e 0d 75 44 2d | f4 20 43 6f 70 79 72 69 |tton.uD-|. Copyri|
|00000050| 67 68 74 20 20 20 20 20 | 20 20 20 20 20 20 20 3a |ght     |       :|
|00000060| 20 41 42 41 42 43 55 53 | 20 54 52 41 49 4e 49 4e | ABABCUS| TRAININ|
|00000070| 47 0d 75 4e 2c f4 20 56 | 65 72 73 69 6f 6e 20 31 |G.uN,. V|ersion 1|
|00000080| 2e 30 30 20 20 20 20 20 | 20 20 20 20 3a 20 32 38 |.00     |    : 28|
|00000090| 74 68 20 4d 61 72 63 68 | 20 31 39 38 38 0d 75 58 |th March| 1988.uX|
|000000a0| 05 3a 0d 75 62 05 3a 0d | 75 6c 36 f4 20 54 68 65 |.:.ub.:.|ul6. The|
|000000b0| 20 73 6f 75 72 63 65 20 | 63 6f 64 65 20 66 6f 72 | source |code for|
|000000c0| 20 61 20 72 65 6c 6f 63 | 61 74 61 62 6c 65 20 6d | a reloc|atable m|
|000000d0| 6f 64 75 6c 65 20 68 65 | 61 64 65 72 2e 0d 75 76 |odule he|ader..uv|
|000000e0| 2a f4 20 54 68 65 20 74 | 69 74 6c 65 20 6f 66 20 |*. The t|itle of |
|000000f0| 74 68 65 20 6d 6f 64 75 | 6c 65 20 69 73 20 48 65 |the modu|le is He|
|00000100| 61 64 65 72 52 4d 2e 0d | 75 80 28 f4 20 54 68 65 |aderRM..|u.(. The|
|00000110| 20 73 69 6e 67 6c 65 20 | 6b 65 79 77 6f 72 64 20 | single |keyword |
|00000120| 69 73 20 2a 54 68 65 4b | 65 79 77 6f 72 64 2e 0d |is *TheK|eyword..|
|00000130| 75 8a 05 3a 0d 75 94 10 | de 20 63 6f 64 65 25 20 |u..:.u..|. code% |
|00000140| 26 32 30 30 0d 75 9e 20 | 65 6e 64 6f 66 63 6f 64 |&200.u. |endofcod|
|00000150| 65 25 3d a4 5f 48 65 61 | 64 65 72 30 32 28 63 6f |e%=._Hea|der02(co|
|00000160| 64 65 25 29 0d 75 a8 40 | ff 28 22 53 41 56 45 20 |de%).u.@|.("SAVE |
|00000170| 26 2e 4d 6f 64 75 6c 65 | 73 2e 48 65 61 64 65 72 |&.Module|s.Header|
|00000180| 4d 6f 64 32 20 22 2b c3 | 7e 28 63 6f 64 65 25 29 |Mod2 "+.|~(code%)|
|00000190| 2b 22 20 22 2b c3 7e 28 | 65 6e 64 6f 66 63 6f 64 |+" "+.~(|endofcod|
|000001a0| 65 25 29 29 0d 75 b2 29 | 2a 53 45 54 54 59 50 45 |e%)).u.)|*SETTYPE|
|000001b0| 20 20 20 20 26 2e 4d 6f | 64 75 6c 65 73 2e 48 65 |    &.Mo|dules.He|
|000001c0| 61 64 65 72 4d 6f 64 32 | 20 26 46 46 41 0d 75 bc |aderMod2| &FFA.u.|
|000001d0| 24 2a 53 54 41 4d 50 20 | 20 20 20 20 20 26 2e 4d |$*STAMP |     &.M|
|000001e0| 6f 64 75 6c 65 73 2e 48 | 65 61 64 65 72 4d 6f 64 |odules.H|eaderMod|
|000001f0| 32 0d 75 c6 24 2a 52 4d | 4c 4f 41 44 20 20 20 20 |2.u.$*RM|LOAD    |
|00000200| 20 26 2e 4d 6f 64 75 6c | 65 73 2e 48 65 61 64 65 | &.Modul|es.Heade|
|00000210| 72 4d 6f 64 32 0d 75 d0 | 0f 2a 54 68 65 4b 65 79 |rMod2.u.|.*TheKey|
|00000220| 77 6f 72 64 0d 75 da 05 | e0 0d 75 e4 05 3a 0d 75 |word.u..|..u..:.u|
|00000230| ee 05 3a 0d 75 f8 18 dd | 20 a4 5f 48 65 61 64 65 |..:.u...| ._Heade|
|00000240| 72 30 32 28 73 74 61 72 | 74 25 29 0d 76 02 05 3a |r02(star|t%).v..:|
|00000250| 0d 76 0c 0e ea 20 73 70 | 2c 70 61 73 73 25 0d 76 |.v... sp|,pass%.v|
|00000260| 16 2a ea 20 6d 6f 64 75 | 6c 65 68 65 6c 70 2c 6b |.*. modu|lehelp,k|
|00000270| 65 79 77 6f 72 64 73 2c | 6d 6f 64 75 6c 65 74 69 |eywords,|moduleti|
|00000280| 74 6c 65 2c 63 6f 64 65 | 0d 76 20 21 ea 20 6d 69 |tle,code|.v !. mi|
|00000290| 6e 70 61 72 61 6d 65 74 | 65 72 73 2c 6d 61 78 70 |nparamet|ers,maxp|
|000002a0| 61 72 61 6d 65 74 65 72 | 73 0d 76 2a 1b ea 20 62 |arameter|s.v*.. b|
|000002b0| 61 64 73 79 6e 74 61 78 | 2c 6b 65 79 77 6f 72 64 |adsyntax|,keyword|
|000002c0| 68 65 6c 70 0d 76 34 05 | 3a 0d 76 3e 05 3a 0d 76 |help.v4.|:.v>.:.v|
|000002d0| 48 07 ea 20 85 0d 76 52 | 2f ee 20 85 20 ff 28 22 |H.. ..vR|/. . .("|
|000002e0| 46 58 20 33 2c 30 22 29 | 3a ef 20 32 36 2c 31 32 |FX 3,0")|:. 26,12|
|000002f0| 3a f6 3a f1 20 22 20 61 | 74 20 6c 69 6e 65 20 22 |:.:. " a|t line "|
|00000300| 3b 9e 3a fa 0d 76 5c 05 | 3a 0d 76 66 05 3a 0d 76 |;.:..v\.|:.vf.:.v|
|00000310| 70 1a f4 20 55 73 65 20 | 74 68 65 20 42 41 53 49 |p.. Use |the BASI|
|00000320| 43 20 73 74 61 63 6b 2e | 0d 76 7a 26 73 70 20 20 |C stack.|.vz&sp  |
|00000330| 20 20 20 20 20 20 20 3d | 20 31 33 20 20 3a f4 20 |       =| 13  :. |
|00000340| 53 74 61 63 6b 20 70 6f | 69 6e 74 65 72 2e 0d 76 |Stack po|inter..v|
|00000350| 84 05 3a 0d 76 8e 05 3a | 0d 76 98 37 f4 20 53 65 |..:.v..:|.v.7. Se|
|00000360| 74 20 74 68 65 20 6d 69 | 6e 69 6d 75 6d 20 61 6e |t the mi|nimum an|
|00000370| 64 20 6d 61 78 69 6d 75 | 6d 20 6e 75 6d 62 65 72 |d maximu|m number|
|00000380| 20 6f 66 20 70 61 72 61 | 6d 65 74 65 72 73 2e 0d | of para|meters..|
|00000390| 76 a2 39 6d 69 6e 70 61 | 72 61 6d 65 74 65 72 73 |v.9minpa|rameters|
|000003a0| 20 3d 20 30 20 3a f4 20 | 54 68 65 20 6d 69 6e 69 | = 0 :. |The mini|
|000003b0| 6d 75 6d 20 6e 75 6d 62 | 65 72 20 6f 66 20 70 61 |mum numb|er of pa|
|000003c0| 72 61 6d 65 74 65 72 73 | 0d 76 ac 39 6d 61 78 70 |rameters|.v.9maxp|
|000003d0| 61 72 61 6d 65 74 65 72 | 73 20 3d 20 30 20 3a f4 |arameter|s = 0 :.|
|000003e0| 20 54 68 65 20 6d 61 78 | 69 6d 75 6d 20 6e 75 6d | The max|imum num|
|000003f0| 62 65 72 20 6f 66 20 70 | 61 72 61 6d 65 74 65 72 |ber of p|arameter|
|00000400| 73 0d 76 b6 05 3a 0d 76 | c0 05 3a 0d 76 ca 17 e3 |s.v..:.v|..:.v...|
|00000410| 20 70 61 73 73 25 20 3d | 20 30 20 b8 20 33 20 88 | pass% =| 0 . 3 .|
|00000420| 20 33 0d 76 d4 0d 50 25 | 3d 73 74 61 72 74 25 0d | 3.v..P%|=start%.|
|00000430| 76 de 0e 5b 4f 50 54 20 | 70 61 73 73 25 0d 76 e8 |v..[OPT |pass%.v.|
|00000440| 0a 45 51 55 44 20 30 0d | 76 f2 0a 45 51 55 44 20 |.EQUD 0.|v..EQUD |
|00000450| 30 0d 76 fc 0a 45 51 55 | 44 20 30 0d 77 06 0a 45 |0.v..EQU|D 0.w..E|
|00000460| 51 55 44 20 30 0d 77 10 | 1d 45 51 55 44 20 28 6d |QUD 0.w.|.EQUD (m|
|00000470| 6f 64 75 6c 65 74 69 74 | 6c 65 2d 73 74 61 72 74 |oduletit|le-start|
|00000480| 25 29 0d 77 1a 1c 45 51 | 55 44 20 28 6d 6f 64 75 |%).w..EQ|UD (modu|
|00000490| 6c 65 68 65 6c 70 2d 73 | 74 61 72 74 25 29 0d 77 |lehelp-s|tart%).w|
|000004a0| 24 1a 45 51 55 44 20 28 | 6b 65 79 77 6f 72 64 73 |$.EQUD (|keywords|
|000004b0| 2d 73 74 61 72 74 25 29 | 0d 77 2e 0a 45 51 55 44 |-start%)|.w..EQUD|
|000004c0| 20 30 0d 77 38 0a 45 51 | 55 44 20 30 0d 77 42 0a | 0.w8.EQ|UD 0.wB.|
|000004d0| 45 51 55 44 20 30 0d 77 | 4c 0a 45 51 55 44 20 30 |EQUD 0.w|L.EQUD 0|
|000004e0| 0d 77 56 10 2e 6d 6f 64 | 75 6c 65 74 69 74 6c 65 |.wV..mod|uletitle|
|000004f0| 0d 77 60 13 45 51 55 53 | 20 22 48 65 61 64 65 72 |.w`.EQUS| "Header|
|00000500| 52 4d 22 0d 77 6a 0a 45 | 51 55 44 20 30 0d 77 74 |RM".wj.E|QUD 0.wt|
|00000510| 09 41 4c 49 47 4e 0d 77 | 7e 0f 2e 6d 6f 64 75 6c |.ALIGN.w|~..modul|
|00000520| 65 68 65 6c 70 0d 77 88 | 41 45 51 55 53 20 22 52 |ehelp.w.|AEQUS "R|
|00000530| 4d 20 48 65 61 64 65 72 | 22 2b bd 28 26 30 39 29 |M Header|"+.(&09)|
|00000540| 2b 22 31 2e 30 30 20 28 | 32 38 20 4d 61 72 20 31 |+"1.00 (|28 Mar 1|
|00000550| 39 38 38 29 20 20 41 42 | 41 43 55 53 20 54 52 41 |988)  AB|ACUS TRA|
|00000560| 49 4e 49 4e 47 22 0d 77 | 92 0a 45 51 55 42 20 30 |INING".w|..EQUB 0|
|00000570| 0d 77 9c 09 41 4c 49 47 | 4e 0d 77 a6 0d 2e 6b 65 |.w..ALIG|N.w...ke|
|00000580| 79 77 6f 72 64 73 0d 77 | b0 15 45 51 55 53 20 22 |ywords.w|..EQUS "|
|00000590| 54 68 65 4b 65 79 77 6f | 72 64 22 0d 77 ba 0a 45 |TheKeywo|rd".w..E|
|000005a0| 51 55 42 20 30 0d 77 c4 | 09 41 4c 49 47 4e 0d 77 |QUB 0.w.|.ALIGN.w|
|000005b0| ce 16 45 51 55 44 20 28 | 63 6f 64 65 2d 73 74 61 |..EQUD (|code-sta|
|000005c0| 72 74 25 29 0d 77 d8 16 | 45 51 55 57 20 6d 69 6e |rt%).w..|EQUW min|
|000005d0| 70 61 72 61 6d 65 74 65 | 72 73 0d 77 e2 16 45 51 |paramete|rs.w..EQ|
|000005e0| 55 57 20 6d 61 78 70 61 | 72 61 6d 65 74 65 72 73 |UW maxpa|rameters|
|000005f0| 0d 77 ec 1b 45 51 55 44 | 20 28 62 61 64 73 79 6e |.w..EQUD| (badsyn|
|00000600| 74 61 78 2d 73 74 61 72 | 74 25 29 0d 77 f6 1d 45 |tax-star|t%).w..E|
|00000610| 51 55 44 20 28 6b 65 79 | 77 6f 72 64 68 65 6c 70 |QUD (key|wordhelp|
|00000620| 2d 73 74 61 72 74 25 29 | 0d 78 00 0a 45 51 55 44 |-start%)|.x..EQUD|
|00000630| 20 30 0d 78 0a 0e 2e 62 | 61 64 73 79 6e 74 61 78 | 0.x...b|adsyntax|
|00000640| 0d 78 14 48 45 51 55 53 | 20 22 53 79 6e 74 61 78 |.x.HEQUS| "Syntax|
|00000650| 3a 22 2b bd 28 26 30 39 | 29 2b 22 2a 54 68 65 4b |:"+.(&09|)+"*TheK|
|00000660| 65 79 77 6f 72 64 20 28 | 77 69 74 68 6f 75 74 20 |eyword (|without |
|00000670| 61 6e 79 20 70 61 72 61 | 6d 65 74 65 72 73 29 2e |any para|meters).|
|00000680| 22 2b bd 28 26 30 44 29 | 0d 78 1e 0a 45 51 55 42 |"+.(&0D)|.x..EQUB|
|00000690| 20 30 0d 78 28 09 41 4c | 49 47 4e 0d 78 32 10 2e | 0.x(.AL|IGN.x2..|
|000006a0| 6b 65 79 77 6f 72 64 68 | 65 6c 70 0d 78 3c 3b 45 |keywordh|elp.x<;E|
|000006b0| 51 55 53 20 22 2a 54 68 | 65 4b 65 79 77 6f 72 64 |QUS "*Th|eKeyword|
|000006c0| 22 2b bd 28 26 30 39 29 | 2b 22 74 61 6b 65 73 20 |"+.(&09)|+"takes |
|000006d0| 6e 6f 20 70 61 72 61 6d | 65 74 65 72 73 2e 22 2b |no param|eters."+|
|000006e0| bd 28 26 30 44 29 0d 78 | 46 0a 45 51 55 42 20 30 |.(&0D).x|F.EQUB 0|
|000006f0| 0d 78 50 09 41 4c 49 47 | 4e 0d 78 5a 09 2e 63 6f |.xP.ALIG|N.xZ..co|
|00000700| 64 65 0d 78 64 1c 53 54 | 4d 46 44 20 28 73 70 29 |de.xd.ST|MFD (sp)|
|00000710| 21 2c 7b 52 30 2d 52 31 | 32 2c 52 31 34 7d 0d 78 |!,{R0-R1|2,R14}.x|
|00000720| 6e 15 53 57 49 20 22 58 | 4f 53 5f 4e 65 77 4c 69 |n.SWI "X|OS_NewLi|
|00000730| 6e 65 22 0d 78 78 14 53 | 57 49 20 22 58 4f 53 5f |ne".xx.S|WI "XOS_|
|00000740| 57 72 69 74 65 53 22 0d | 78 82 4c 45 51 55 53 20 |WriteS".|x.LEQUS |
|00000750| 22 54 68 69 73 20 69 73 | 20 61 20 73 69 6d 70 6c |"This is| a simpl|
|00000760| 65 20 6d 6f 64 75 6c 65 | 20 68 65 61 64 65 72 20 |e module| header |
|00000770| 66 72 6f 6d 20 41 42 41 | 43 55 53 20 54 52 41 49 |from ABA|CUS TRAI|
|00000780| 4e 49 4e 47 2e 20 20 20 | 20 20 20 20 20 20 20 20 |NING.   |        |
|00000790| 20 20 22 0d 78 8c 0a 45 | 51 55 42 20 30 0d 78 96 |  ".x..E|QUB 0.x.|
|000007a0| 09 41 4c 49 47 4e 0d 78 | a0 15 53 57 49 20 22 58 |.ALIGN.x|..SWI "X|
|000007b0| 4f 53 5f 4e 65 77 4c 69 | 6e 65 22 0d 78 aa 1b 4c |OS_NewLi|ne".x..L|
|000007c0| 44 4d 46 44 20 28 73 70 | 29 21 2c 7b 52 30 2d 52 |DMFD (sp|)!,{R0-R|
|000007d0| 31 32 2c 50 43 7d 0d 78 | b4 05 5d 0d 78 be 0b ed |12,PC}.x|..].x...|
|000007e0| 20 70 61 73 73 25 0d 78 | c8 07 3d 50 25 0d ff    | pass%.x|..=P%.. |
+--------+-------------------------+-------------------------+--------+--------+